home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 24 / CU Amiga Magazine's Super CD-ROM 24 (1998)(EMAP Images)(GB)(Track 1 of 2)[!][issue 1998-07].iso / CUCD / Games / TaskForce / Install_TaskForce < prev    next >
Text File  |  1998-04-04  |  2KB  |  112 lines

  1. ; $VER: Install_TaskForce 1.04 (04.04.98)
  2.  
  3. (complete 0)
  4.  
  5. ; version check
  6. (if (< (/ (getversion) 65536) 37)
  7.     (abort "You must be using Kickstart 2.04 or higher to run TaskForce.")
  8. )
  9.  
  10. (welcome)
  11.  
  12. (set @default-dest
  13.     (askdir
  14.         (prompt "Please choose a directory where to install the game. A directory named \"TaskForce\" will be created.")
  15.         (help @askdir-help)
  16.         (default @default-dest)
  17.     )
  18. )
  19.  
  20. (complete 10)
  21.  
  22. (set #missions 3)    ; default missions to be installed
  23. (if (= @user-level 2)
  24.     (set #missions
  25.         (askoptions
  26.             (prompt "Select the missions you wish to install.")
  27.             (help (cat
  28.                 "The mission files are needed to play TaskForce. "
  29.                 "Each mission introduces new characters, defines "
  30.                 "other objectives, and usually also offers a "
  31.                 "different setting. It is recommended to copy all files. "
  32.                 "However, you may opt not to install all available "
  33.                 "missions because of low harddisk space, for example "
  34.                 "(rather improbable, isn't it?).\n"
  35.                 "The number in brackets indicates whether it is a "
  36.                 "scenario for one or two human players."
  37.             ))
  38.             (choices "Hide & Seek (1)" "Urban Combat (2)")
  39.             (default #missions)
  40.         )
  41.     )
  42. )
  43.  
  44. (complete 20)
  45.  
  46. (set #instdir (tackon @default-dest "TaskForce") )
  47.  
  48. (makedir #instdir (infos))
  49. (makedir (tackon #instdir "Games"))
  50. (makedir (tackon #instdir "Missions"))
  51. (makedir (tackon #instdir "Missions/OnePlayer"))
  52. (makedir (tackon #instdir "Missions/TwoPlayers"))
  53. (makedir (tackon #instdir "Briefings"))
  54.  
  55. (complete 30)
  56.  
  57. (copyfiles
  58.     (prompt "Copying game files...")
  59.     (help @copyfiles-help)
  60.     (source "")
  61.     (dest #instdir)
  62.     (choices "TaskForce" "Editor" "Data" "Docs" "Briefings.info")
  63.     (infos)
  64. )
  65.  
  66. (complete 65)
  67.  
  68. (working "\n\n\nTaskForce is now installing the mission files...")
  69.  
  70. (set n 0)
  71. (while
  72.     (set #missionfiles
  73.         (select n
  74.             "OnePlayer/Hide & Seek"
  75.             "TwoPlayers/Urban Combat"
  76.             ""
  77.         )
  78.     )
  79. (
  80.     (if (IN #missions n)
  81.         (
  82.             (copyfiles
  83.                 (source "Missions/")
  84.                 (dest (pathonly (tackon (tackon #instdir "Missions/") #missionfiles) ) )
  85.                 (choices (cat #missionfiles ".mission"))
  86.                 (nogauge)
  87.             )
  88.             (copyfiles
  89.                 (source "Briefings/")
  90.                 (dest (tackon #instdir "Briefings"))
  91.                 (choices (fileonly #missionfiles))
  92.                 (infos)
  93.                 (nogauge)
  94.             )
  95.         )
  96.     )
  97.     (set n (+ n 1))
  98.     (complete (+ 65 (* n 10)))
  99. ))
  100.  
  101. (complete 90)
  102.  
  103. (copylib
  104.     (prompt "Installing reqtools.library")
  105.     (help @copylib-help)
  106.     (source "Libs/reqtools.library")
  107.     (dest "LIBS:")
  108.     (confirm)
  109. )
  110.     
  111. (complete 100)
  112.